home *** CD-ROM | disk | FTP | other *** search
/ MacHome 2001 January / MacHome Magazine Demo Disc January 2001.iso / mac / Software / Word Processing / JanusNode 1.10.sea / JanusNode 1.10 / JanusNode Resources / TextDNA / PseudoIntellectualism / 0Narrative.textDNA next >
Encoding:
Text File  |  2000-02-06  |  15.0 KB  |  50 lines  |  [TEXT/MSWD]

  1. 100 Subject(start) < chooseTextDNA(Title) 100 > "-------" 100
  2. ***
  3. 100 Subject(Title) < UseSize(18) 100 > < capitalizenext() 100 > < get(Mod1) 100 > < capitalize() 100 > < Get(topic1) 100 > ":" 100 { "How is it different from" 100 < capitalize() 100 > < get(Mod2) 100 > < Get(topic2) 100 > "?" 100 | "How it can enhance your life." 100 | "Lessons from a" 100 attributes 50 < get(Person) 100 > | "Its debt to" 100 < Get(inventor) 100 > | < capitalizenext() 100 > adjectives 30 < get(person) 100 > "s" 100 "and" 100 < Get(inventor) 100 > | < capitalizenext() 100 > adjectives 30 < get(person) 100 > "s" 100 "," 100 p_nouns 100 ", and you" 100 | "A tool for" 100 attributes 30 < get(person) 100 > "s" |  < Get(inventor) 100 > "'s" 100 "gift to mankind" 100 } return 100 < chooseTextDNA(Sentence1) 100 >
  4. ***
  5. 100 Subject(Sentence1) < UseSize(14) 100 > TextDemonParagraphStarter 100 { "Today I am going to teach you about" 100 | "The topic for today is" 100 | "Today's topic is" 100 } < get(Mod1) 100 > < Get(topic1) 100 > { "and" 100 "more specifically" 50 "its debt to" 100 "the work of" 30 < Get(inventor) 100 > "." 100 | "and the role played by" 100 < Get(inventor) 100 > "in its development." 100 |  "." 100 "More specifically, I will discuss the role played by" 100 < Get(inventor) 100 > "in the development of" 100 "this form" 50  < Get(topic1) 100 > "." 100 | "." 100 | "." 100  | "." 100 } < chooseTextDNA(Sentence2) 100 >
  6. ***
  7. 100 Subject(Sentence1) < UseSize(14) 100 > TextDemonParagraphStarter 100 { "Can anyone" 100 "alive today" 20 "truly understand" 100 | "Have you ever wondered about" 100 | "What can we learn from a" 100 < get(person) 100 > "about" 100 | "Would you like to hear about" 100  < get(person) 100 > "s" 100 "and" 100 "their obsession with" 50 | "How much is known" 100 "today" 20 "about" 100  | "What is the contemporary significance of" 100 } < get(Mod1) 100 > < Get(topic1) 100 > "?" 100 < chooseTextDNA(Sentence2) 100 >
  8. ***
  9. 100 Subject(Sentence1) < UseSize(14) 100 > TextDemonParagraphStarter 100 < capitalizenext() 100 > < get(Mod1) 100 > < Get(topic1) 100 > { "is a subject that" 100 attributes 100 "people like I love" 100 "to hate" 30 | "is something you need to understand" 100 | "is a subject that" 100 attributes 100 "people like you need to understand" 100 | "is useful to study if you are" 100 attributes 100 | "is useful to study if you are a" 100 "practicing" 20 < get(person) 100 > } "." 100 < chooseTextDNA(Sentence2) 100 >
  10. ***
  11. 100 Subject(Sentence2) TextDemonSentenceStarter 100 < get(Mod1) 100 > < Get(topic1) 100 > "is often confused with" 100 < get(Mod2) 100 > < Get(topic2) 100 > "." 100 < chooseTextDNA(Sentence3) 100 > < chooseTextDNA(Sentence2a) 40 > < chooseTextDNA(Sentence2) 20 >
  12. ***
  13. 100 Subject(Sentence2) TextDemonSentenceStarter 100 "Perhaps you are among those who" 100 { "have confused" 100 < get(Mod1) 100 > < Get(topic1) 100 > "with" 100 | "think of" 100  < get(Mod1) 100 > < Get(topic1) 100 > "as" 100 | "believe that" 100  < get(Mod1) 100 > < Get(topic1) 100 > "is nothing more than" 100 } { < get(Mod2) 100 > < Get(topic2) 100 > | < get(Mod2) 100 > PhilosophicalNouns 100 | PhilosophicalAdjs 100 PhilosophicalNouns 100 | "a" 100  < get(Person) 100 > "'s" 100 "hobby" 100 | "a private obsession for" 100 < Get(inventor) 100 > } "." 100 < chooseTextDNA(Sentence3) 100 > < chooseTextDNA(Sentence2) 30 > < chooseTextDNA(Sentence2a) 30 >
  14. ***
  15. 100 Subject(Sentence2) TextDemonSentenceStarter 100 "Early" 100 < get(Person) 100 > "s" 100 "sometimes" 50 { "believed that" 100 | "pretended that" 100 | "supposed that" 100 | "acted as if" 100 | "told" 100  attributes 60 "lay people that" 100 } < get(Mod1) 100 > < Get(topic1) 100 > "was" 100 { "not different from" 100 | "nothing more than" 100 | "only a form of" 100 | "a modified type of" 100 | "nothing more than" 30 "what a" 100 people 100 "might call" 100 | "what was elsewhere referred to as" 100 } < get(Mod2) 100 > < Get(topic2) 100 > { "." 100 | "!" 100}  < chooseTextDNA(Sentence3) 100 > < chooseTextDNA(Sentence2a) 30 >
  16. ***
  17. 100 Subject(Sentence2a) TextDemonSentenceStarter 100 < assign(adj1,adjectives) 100 > < assign(n1,s_nouns) 100 > < assign(adj3,adjectives) 100 > < assign(adj4,adjectives) 100 > "Consider the two terms." 100 TextDemonOpenQuote 100 < capitalizenext() 100 > < get(Mod1) 100 > TextDemonCloseQuote 100 { "refers to a quality of" 100 | "comes from a Greek word meaning" 100 | "comes from a Latin word meaning" 100 | "comes from an Aramaic word meaning" 100 | "comes from a" 100 "ancient" 50 "Hindu word meaning" 100| "has" 100 "etymological" 50 "roots which mean" 100 } TextDemonOpenQuote 100 < get(adj1) 100 > < get(n1) 100 > "s" 100 TextDemonCloseQuote 100 < backspace() 100 > "." 100 TextDemonOpenQuote 100 < capitalizenext() 100 > < Get(topic1) 100 >  TextDemonCloseQuote 100 { "refers to" 100 | "has etymological roots which suggest" 100 } { "the idea of" 50 < get(adj3) 100 > < backspace() 100 > "ness" 100 | "something" 100 < get(adj3) 100 > } { "and something" 100 "which is" 50 | ", something" 100 } < get(adj4) 100 > "." 100 "A" 100 < get(adj1) 100 > < get(adj3) 100 > < get(adj4) 100 > < get(n1) 100 > "." 100 { "A" 100 "kind of" 30 | "Perhaps a" 100 "kind of" 50 | "Think of a" 100 } s_nouns 100 "." 100 < chooseTextDNA(Sentence3) 100 >
  18. ***
  19. 100 Subject(Sentence3) TextDemonSentenceStarter 100 < capitalize() 100 > < get(Mod1) 100 > < Get(topic1) 100 > { "has been attracting increasing attention from" 100 < get(Person) 100 > "s" 100 "since it was first invented in the year" 100 < random(2000) 100 > "A.D" 100 | "has been" 100 "obsessively" 20 "studied by" 100 < get(Person) 100 > "s" 100 "since it was" 100 "first" 30 "invented in the year" 100 < random(2000) 100 > "B.C" 100 | "is a subject that every" 100 < get(Person) 100 > "studies intensely" 100 | "is of particular interest to" 100 < get(Person) 100 > "s" 100 } "." 100 < chooseTextDNA(Sentence4) 100 >
  20. ***
  21. 100 Subject(Sentence4) TextDemonSentenceStarter 100 "Let us be clear about what it is" 100 "not" 50 "." 100 "It is" 100 "not" 50 "just a form of" 100 PhilosophicalAdjs 20 PhilosophicalAdjs 100 PhilosophicalNouns 100 "." 100 "It is not" 100 < get(Mod2) 100 > [ "or" 100 PhilosophicalAdjs 100 ] "." 100 < capitalize() 100 > < Get(topic1) 100 > { "(whether" 100 < get(Mod1) 100 > "or" 100 < get(Mod2) 100 > < backspace() 100 > ")" 100 | "in all its" 100 adjectives 50 "forms" 100 | ", as practiced by professional" 100 < get(Person) 100 > "s" 100 "today" 50 "," 100 } "is not a method of understanding" 100 adjectives 100 p_nouns 100 "." 100 < chooseTextDNA(Sentence5) 100 >
  22. ***
  23. 100 Subject(Sentence4) TextDemonSentenceStarter 100 { "There are" 100 "perhaps" 30 "not" 50 "many reasons for this" 100 "interest" 50 "." 100 | "It is not easy to say why." 100 | "One may only speculate as to the reasons why." 100 } { "Studying" 100 < Get(topic1) 100 > "will not only make you a better" 100 < get(Person) 100 > "but will make you more" 100 [ attributes 100 "," 100 ] "and" 100  attributes 100 "as well" 100 |  "Studying" 100 < Get(topic1) 100 > "not only makes one a better" 100 < get(Person) 100 > "but it also makes one" 100 [ attributes 100 "," 100 ] "and" 100  attributes 100 "as well" | "The study of" 100 < Get(topic1) 100 > "makes one a better" 100 < get(Person) 100 > "." 100 "It also makes one more" 100 attributes 100 "and" 100  attributes 100  | "Studying" 100 < Get(topic1) 100 > "will not make one a better" 100 < get(Person) 100 > | "For most" 100 < get(Person) 100 > "s" 100 "studying" 100 < Get(topic1) 100 > "would be" 100 "little" 50 "more fruitful than studying the" 100 PhilosophicalNouns 100 "of a" 100 adjectives 100 s_nouns 100 | "Most" 100 < get(Person) 100 > "s" 100 "would be better off studying the" 100 PhilosophicalNouns 100 "of" 100 adjectives 100 s_nouns 100 "than attempting to understand" 100 < Get(topic1) 100 > | "For most" 100 < get(Person) 100 > "s" 100 "studying" 100 < Get(topic1) 100 > "would be" 100 "no" 50 "more fruitful than studying" 100 animals 100 PhilosophicalNouns 100 }  "." 100 < chooseTextDNA(Sentence5) 100 >
  24. ***
  25. 100 Subject(Sentence5) TextDemonParagraphStarter 100 { < Get(inventor) 100 > "brought" 100 < Get(topic1) 100 > "into its modern form" 100 | "Today's" 100 adjectives 50 < Get(topic1) 100 > "owes a debt to" 100 < Get(inventor) 100 > | "Modern" 100 < get(Person) 100 > "s" 100 "owe a debt of gratitude to" 100 < Get(inventor) 100 > | "To understand" 100 < Get(topic1) 100 > "today" 50 "we need to look to" 100 "the work of" 50 < get(inventor) 100 > } "." 100 < chooseTextDNA(Sentence6) 100 > < chooseTextDNA(Sentence5a) 20 >
  26. ****
  27. 100 Subject(Sentence5a) TextDemonSentenceStarter 100 { "Although best remembered for other contributions," 100 | "Although history has focused elsewhere," 100 } < Get(inventor) 100 > { "'s" 100 "contributions to" 100  adjectives 50 < Get(topic1) 100 > "were substantial" 100 | "had time to invent the" 100 adjectives 100 s_nouns 100 "as well as revolutionizing" 100 < Get(topic1) 100 > | "was" 100 "also" 20 "a" 100 "well-known" 20 attributes 30 < get(person) 100 > | "was" 100 "also" 20 "a" 100 "well-known" 20 "advocate of" 100 < get(person) 100 > "'s" 100 "rights" 100 | "was" 100 "also" 20 "interested in" 100 < get(person) 100 > "'s" 100 p_nouns 100 }  "." 100 < chooseTextDNA(Sentence6) 100 >
  28. ***
  29. 100 Subject(Sentence5a) TextDemonSentenceStarter 100 "Some have suggested that" 100 < Get(inventor) 100 > "had nothing to do with" 100 < Get(topic1) 100 >  "!" 100  < chooseTextDNA(Sentence6) 100 >
  30. ****
  31. 100 Subject(Sentence5a) TextDemonSentenceStarter 100 "The" 100 { "reknowned" 100 | "infamous" 100 | attributes 100 } attributes 30 { < get(person) 100 > | people 100 } { TextDemonName 100 | FamousPeople 100 "(the younger)" 10 | FamousPeople 100 "(the elder)" 10 } "has" 40 { "suggested" 100 | "insinuated" 100 | "implied" 100 } { "in a recent tome" 40 | "in a recent interview" 100 | "in published work" 100 } "that" 100 < Get(inventor) 100 > "was too busy with" 100 gerunds 30 adjectives 100 s_nouns 100 "s" 100 "to study" 100 < Get(topic1) 100 > { "!" 100 | "." 100 } { "What nonsense!" 10 | "This is not true." 20 | "This does not accord with the known facts." 20 } < chooseTextDNA(Sentence6) 100 >
  32. ***
  33. 100 Subject(Sentence6) TextDemonSentenceStarter 100 { "Working" 100 | "Tinkering" 100 | "Researching" 100 } { "alone" 100 | "part time" 100 | "in virtual seclusion" 100 | "with a" 100 adjectives 30 "team of" 100 people 100 "s" 100 | "for" 100 < random(20) 100 > "years" 100 | "with" 100 "the living spirit of" 20 FamousPeople 100 } "," 100 < Get(inventor) 100 > { "uncovered" 100 | "was able to document" 100 | "discovered" 100 | "demonstrated" 100 } adjectives 100 "similarities between" 100 < Get(mod1) 70 > < Get(topic1) 100 > "and" 100 PhilosophicalAdjs 100 PhilosophicalNouns 100 "." 100 < chooseTextDNA(Sentence7) 100 >
  34. ****
  35. 100 Subject(Sentence6) TextDemonSentenceStarter 100 "By the time" 100 < Get(inventor) 100 > "was" 100 { adjectives 100 | < random(60) 100 > "years old" 100 | "finished" 100 gerunds 30 | "dead" 100 | adverbs 30 s_verbs_past 100 } { "our" 100 [ attributes 70 ] "planet" 100 | "the work of" 100 < get(Person) 100 > "s" 100 | "not only" 100 < Get(mod1) 70 > < Get(topic1) 100 > "but" 100 adjectives 50 PhilosophicalAdjs 50 PhilosophicalNouns 100 } { "was changed forever" 100 | "was" 100 s_verbs_past 100 } "." 100 < chooseTextDNA(Sentence7) 100 > < chooseTextDNA(Sentence7) 100 >
  36. ****
  37. 100 Subject(Sentence7) TextDemonSentenceStarter 100 < capitalize() 100 > { < Get(inventor) 100 > "'s" 100 adjectives 70 | "This" 100 } { "work" 100 | "effort" 100 | "interpretive" 50 "framework" 100 | PhilosophicalNouns 100 } { "made clear" 100 | "proved conclusively" 100 | "suggested" 100 "to some" 50 | "helped" 100 < get(Person) 100 > "s" 100 "to see" 100 } "that" 100 { adjectives 100 p_nouns 100 | < get(Mod2) 100 > "entities" 100 } "could be considered as" 100 { adjectives 70 p_nouns 100 | < get(Mod1) 100 > "entities" 60 } { "under idealized conditions" 100 | "if you were a practicing" 100 < get(Person) 100 > | "if" 100 adjectives 50 p_nouns 100 "were" 100 "conceived of as" 50 adjectives 50 p_nouns 100 | "for" 100 "most" 20 PhilosophicalAdjs 100 "purposes" 100 | "if we ignored some complications put forth by" 100 "a few" 30 attributes 30 people 100 "s" 100 | "if" 100 "the complications of" 50 adjectives 50 p_nouns 100 "were factored out" 100 } "."  100 < chooseTextDNA(Sentence8) 100 > < chooseTextDNA(Sentence7) 30 > < chooseTextDNA(Sentence7a) 10 >
  38. *****
  39. 100 Subject(Sentence7) TextDemonSentenceStarter 100 < capitalize() 100 > < Get(inventor) 100 > "liberated" 100 { "us" 100 | "humankind" 100 | attributes 100 < get(Person) 100 > "s" 100 | "most" 20 attributes 100 people 100 "s" 100 } "from" 100 { "our" 100 | "the" 100 natural" 70 | "an inherent" 100 | "an ancient" 100 } { "need to equate" 100 | "desire to place" 100 | "tendency to confuse" 100 } { PhilosophicalAdjs 100 PhilosophicalNouns 100 | PhilosophicalAdjs 100 s_nouns 100 "s" 100 | "the antics of" 30 attributes 100 < get(Person) 100 > "s" 100 } "with" 100  { PhilosophicalAdjs 100 PhilosophicalNouns 100 | PhilosophicalAdjs 100 s_nouns 100 | attributes 100 < get(Person) 100 > "s" 100 } "." 100 < chooseTextDNA(Sentence8) 100 > < chooseTextDNA(Sentence7) 30 > < chooseTextDNA(Sentence7a) 20 >
  40. ****
  41. 100 Subject(Sentence7a) TextDemonSentenceStarter 100 < capitalize() 100 > < Get(inventor) 100 > { "allegedly" 20 "once" 100 adverbs 50 "wrote that" 100 | "is said to have" 100 adverbs 50 "remarked that" 100 } TextDemonOpenquote 100 { "life without" 100 |  "a" 100 < get(Person) 100 > "ignorant of" 100 } < Get(mod1) 70 > < Get(topic1) 100 > TextDemonEConnect 100 "a" 100 adjectives 100 gerunds 30 { s_nouns 100 | attributes 30 animals 100 } TextDemonclosequote 100 "." 100 < chooseTextDNA(Sentence8) 100 >
  42. ***
  43. 100 Subject(Sentence8) TextDemonParagraphStarter 100 "After" 100 < Get(inventor) 100 > ", no" 100 attributes 100 < get(Person) 100 >  { "could doubt the significance of" 100 | "could afford to ignore" 100 | "could function in ignorance of" 100 | "could consider" 100 adjectives 100 s_nouns 100 "s" 100 "without also considering" 100 } < get(Mod1) 100 >  < Get(topic1) 100 > "." 100 < loadTextDNAfile("StartWithMe.TextDNA") 100 > < chooseTextDNA(RunMe) 100 >
  44. ***
  45. 100 Subject(Sentence8) TextDemonParagraphStarter 100 "With this insight" 100 < Get(inventor) 100 > "brought" 100 < get(Mod1) 100 >  < Get(topic1) 100 > { "into the 20th century" 100  | "into the lives of" 100 < get(Person) 100 > "s" 100 } "." 100 < loadTextDNAfile("StartWithMe.TextDNA") 100 > < chooseTextDNA(RunMe) 100 >
  46. ***
  47. 100 Subject(Sentence8) TextDemonParagraphStarter 100 "In a post-" 100 < backspace() 100 > < Get(inventor) 100 > "world, no" 100 < get(Person) 100 > { "can ignore this insight into" 100 | "can afford to remain ignorant of" 100 } < get(Mod1) 100 >  < Get(topic1) 100 > "." 100 < loadTextDNAfile("StartWithMe.TextDNA") 100 > < chooseTextDNA(RunMe) 100 >
  48. ***
  49. 100 Subject(Sentence8) TextDemonParagraphStarter 100 "today" 40 "millions of" 100 < get(Person) 100 > "s" 100 "around the world give prayers of thanks for" 100 < Get(inventor) 100 > "'s" 100 adjectives 60 "contributions to" 100 { "the" 100 adjectives 100 "science of" 100 | "the advancement of" 100 adjectives 30 | "" 100 } < get(Mod1) 100 >  < Get(topic1) 100 > "." 100 < loadTextDNAfile("StartWithMe.TextDNA") 100 > < chooseTextDNA(RunMe) 100 >
  50.